home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 12 / Amiga Format AFCD12 (Apr 1997, Issue 96).iso / -in_the_mag- / html_tutorial / mas_cvo.cpp < prev    next >
C/C++ Source or Header  |  1997-01-21  |  2KB  |  50 lines
  1. #include <iostream.h>
  2. #include <stdlib.h>
  3.  
  4. inline void html( char str[] ) { cout << str << "\n"; }
  5.  
  6. inline void html_( char str[] ) { cout << str; }
  7.  
  8. inline void html_( char c ) { cout << c; }
  9.  
  10. // Debug option to deliver 
  11. // environment variables seen by the script
  12.  
  13. char* getenv_n( char var[] )
  14. {
  15.   char *p = getenv( var );
  16.   return p == NULL ? "[]" : p;
  17. }
  18.  
  19. void cgi_var_output( )
  20. {
  21.   html( "<PRE>" );
  22.   html_("AUTH_TYPE         "); html( getenv_n( "AUTH_TYPE" ) );
  23.   html_("CONTENT_LENGTH    "); html( getenv_n( "CONTENT_LENGTH" ) );
  24.   html_("CONTENT_TYPE      "); html( getenv_n( "CONTENT_TYPE" ) );
  25.   html_("GATEWAY_INTERFACE "); html( getenv_n( "GATEWAY_INTERFACE" ) );
  26.   html_("HOSTTYPE          "); html( getenv_n( "HOSTTYPE" ) );
  27.   html_("HTTP_ACCEPT       "); html( getenv_n( "HTTP_ACCEPT" ) );
  28.   html_("HTTP_CONNECTION   "); html( getenv_n( "HTTP_CONNECTION" ) );
  29.   html_("HTTP_HOST         "); html( getenv_n( "HTTP_HOST" ) );
  30.   html_("HTTP_PRAGMA       "); html( getenv_n( "HTTP_PRAGMA" ) );
  31.   html_("HTTP_REFERER      "); html( getenv_n( "HTTP_REFERER" ) );
  32.   html_("HTTP_USER_AGENT   "); html( getenv_n( "HTTP_USER_AGENT" ) );
  33.   html_("OSTYPE            "); html( getenv_n( "OSTYPE" ) );
  34.   html_("PATH_INFO         "); html( getenv_n( "PATH_INFO" ) );
  35.   html_("PATH_TRANSLATED   "); html( getenv_n( "PATH_TRANSLATED" ) );
  36.   html_("QUERY_STRING      "); html( getenv_n( "QUERY_STRING" ) );
  37.   html_("REMOTE_ADDR       "); html( getenv_n( "REMOTE_ADDR" ) );
  38.   html_("REMOTE_HOST       "); html( getenv_n( "REMOTE_HOST" ) );
  39.   html_("REMOTE_IDENT      "); html( getenv_n( "REMOTE_IDENT" ) );
  40.   html_("REMOTE_USER       "); html( getenv_n( "REMOTE_USER" ) );
  41.   html_("REQUEST_METHOD    "); html( getenv_n( "REQUEST_METHOD" ) );
  42.   html_("SCRIPT_NAME       "); html( getenv_n( "SCRIPT_NAME" ) );
  43.   html_("SERVER_NAME       "); html( getenv_n( "SERVER_NAME" ) );
  44.   html_("SERVER_PORT       "); html( getenv_n( "SERVER_PORT" ) );
  45.   html_("SERVER_PROTOCOL   "); html( getenv_n( "SERVER_PROTOCOL" ) );
  46.   html_("SERVER_SOFTWARE   "); html( getenv_n( "SERVER_SOFTWARE" ) );
  47.   html( "</PRE>" );
  48. }
  49.  
  50.